local PartA = Instance.new("Part")
PartA.Transparency = 1
PartA.CanCollide = false
local SA = Instance.new("Sound",PartA)
SA.SoundId = "rbxasset://sounds/bass.mp3"
SA.PlayOnRemove = true
SA.TimePosition = 0.2
local PartB = Instance.new("Part")
PartB.Transparency = 1
PartB.CanCollide = false
local SB = Instance.new("Sound",PartB)
SB.SoundId = "rbxasset://sounds/electronicpingshort.wav"
SB.PlayOnRemove = true
SB.TimePosition = 0.2
local PartC = Instance.new("Part")
PartC.Transparency = 1
PartC.CanCollide = false
local SC = Instance.new("Sound",PartC)
SC.SoundId = "rbxasset://sounds/snap.mp3"
SC.PlayOnRemove = true
SC.TimePosition = 0.2
local PartD = Instance.new("Part")
PartD.Transparency = 1
PartD.CanCollide = false
local SD = Instance.new("Sound",PartD)
SD.SoundId = "rbxasset://sounds/electronicpingshort.wav"
SD.PlayOnRemove = true
SD.TimePosition = 0.2
PartA.Anchored = true
PartB.Anchored = true
PartC.Anchored = true
PartD.Anchored = true
local track = script:FindFirstChild("track")
if not (track and track:IsA("NumberValue")) then
	track = Instance.new("NumberValue",script)
	track.Name = "track"
	track.Value = 1
end
local waitm = script:FindFirstChild("wait")
if not (waitm and waitm:IsA("NumberValue")) then
	waitm = Instance.new("NumberValue",script)
	waitm.Name = "wait"
	waitm.Value = 0.125
end
local pitm = script:FindFirstChild("pitch")
if not (pitm and pitm:IsA("NumberValue")) then
	pitm = Instance.new("NumberValue",script)
	pitm.Name = "pitch"
	pitm.Value = 1
end
local volm = script:FindFirstChild("volume")
if not (volm and volm:IsA("NumberValue")) then
	volm = Instance.new("NumberValue",script)
	volm.Name = "volume"
	volm.Value = 1
end
local skip = script:FindFirstChild("skip")
if not (skip and skip:IsA("BoolValue")) then
	skip = Instance.new("BoolValue",script)
	skip.Name = "skip"
	skip.Value = false
end
function Play(type,pitch,vol)
	if not skip.Value then
		local Part,Sound
		if type == "A" then
			Part,Sound = PartA,SA
		elseif type == "B" then
			Part,Sound = PartB,SB
		elseif type == "C" then
			Part,Sound = PartC,SC
		elseif type == "D" then
			Part,Sound = PartD,SD
		end
		Sound.PlaybackSpeed = pitch*pitm.Value
		Sound.Volume = vol*volm.Value
		Part.Parent = script
		Part.Parent = nil
	end
end
function W(num)
	if not skip.Value then
		wait(num)
	end
end
function One()
	Play("A",0.775,1.6)
	Play("B",0.9,2)
	Play("D",0.45,2)
	W(waitm.Value)
	
	Play("B",0.9,2)
	W(waitm.Value)
	
	Play("A",0.775,0.8)
	Play("D",0.45,2)
	W(waitm.Value)
	
	W(waitm.Value)
	
	Play("B",0.9,2)
	Play("D",0.45,2)
	W(waitm.Value)
	
	W(waitm.Value)
	
	Play("B",0.9,2)
	Play("D",0.45,2)
	W(waitm.Value)
	
	W(waitm.Value)

	Play("A",0.775,1.6)
	Play("B",1.325,2)
	Play("C",1.5,1.5)
	Play("D",0.45,2)
	W(waitm.Value)
	
	Play("B",1.325,2)
	W(waitm.Value)

	Play("A",0.775,0.8)
	Play("B",1.325,2)
	Play("D",0.45,2)
	W(waitm.Value)
	
	Play("B",1.325,2)
	W(waitm.Value)
	
	Play("B",1.325,2)
	Play("D",0.45,2)
	W(waitm.Value)
	
	Play("B",1.325,2)
	W(waitm.Value)

	Play("B",1.325,2)
	Play("D",0.45,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("A",0.775,1.6)
	Play("D",0.45,2)
	W(waitm.Value)
	
	W(waitm.Value)

	Play("A",0.775,0.8)
	Play("D",0.45,2)
	W(waitm.Value)
	
	W(waitm.Value)

	Play("B",1.2,2)
	Play("D",0.45,2)
	W(waitm.Value)

	Play("B",1.2,2)
	W(waitm.Value)

	Play("B",1.325,2)
	Play("D",0.45,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("A",0.775,1.6)
	Play("B",1.4,2)
	Play("C",1.5,1.5)
	Play("D",0.45,2)
	W(waitm.Value)

	Play("B",1.4,2)
	W(waitm.Value)

	Play("A",0.775,0.8)
	Play("B",1.325,2)
	Play("D",0.45,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("B",1.325,2)
	Play("D",0.45,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("B",1.2,2)
	Play("D",0.45,2)
	W(waitm.Value)

	Play("B",1.2,2)
	W(waitm.Value)
end
function Two()
	Play("A",0.775,1.6)
	Play("B",1.325,2)
	Play("D",0.45,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("A",0.775,0.8)
	Play("B",1.325,2)
	Play("D",0.45,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("B",1.325,2)
	Play("D",0.45,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("B",1.325,2)
	Play("D",0.45,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("A",0.775,1.6)
	Play("B",1.325,2)
	Play("C",1.5,1.5)
	Play("D",0.45,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("A",0.775,0.8)
	Play("B",1.325,2)
	Play("D",0.45,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("B",1.325,2)
	Play("D",0.45,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("B",1.325,2)
	Play("D",0.45,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("A",0.775,1.6)
	Play("B",1.325,2)
	Play("D",0.45,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("A",0.775,0.8)
	Play("B",1.325,2)
	Play("D",0.45,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("B",1.325,2)
	Play("D",0.45,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("B",1.325,2)
	Play("D",0.45,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("A",0.775,1.6)
	Play("B",1.325,2)
	Play("C",1.5,1.5)
	Play("D",0.45,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("A",0.775,0.8)
	Play("B",1.325,2)
	Play("D",0.45,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("B",1.325,2)
	Play("D",0.45,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("D",0.45,2)
	W(waitm.Value)

	W(waitm.Value)
end
function Three()
	Play("A",0.8,1.6)
	Play("B",0.93,2)
	Play("D",0.475,2)
	W(waitm.Value)

	Play("B",0.93,2)
	W(waitm.Value)

	Play("A",0.8,0.8)
	Play("D",0.475,2)
	W(waitm.Value)

	W(waitm.Value)

	Play("B",0.93,2)
	Play("D",0.475,2)
	W(waitm.Value)

	W(waitm.Value)

	Play("B",0.93,2)
	Play("D",0.475,2)
	W(waitm.Value)

	W(waitm.Value)

	Play("A",0.8,1.6)
	Play("B",1.325,2)
	Play("C",1.5,1.5)
	Play("D",0.475,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("A",0.8,0.8)
	Play("B",1.325,2)
	Play("D",0.475,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("B",1.325,2)
	Play("D",0.475,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("B",1.325,2)
	Play("D",0.475,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("A",0.8,1.6)
	Play("D",0.475,2)
	W(waitm.Value)

	W(waitm.Value)

	Play("A",0.8,0.8)
	Play("D",0.475,2)
	W(waitm.Value)

	W(waitm.Value)

	Play("B",1.2,2)
	Play("D",0.475,2)
	W(waitm.Value)

	Play("B",1.2,2)
	W(waitm.Value)

	Play("B",1.325,2)
	Play("D",0.475,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("A",0.8,1.6)
	Play("B",1.4,2)
	Play("C",1.5,1.5)
	Play("D",0.475,2)
	W(waitm.Value)

	Play("B",1.4,2)
	W(waitm.Value)

	Play("A",0.8,0.8)
	Play("B",1.325,2)
	Play("D",0.475,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("B",1.325,2)
	Play("D",0.475,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("B",1.2,2)
	Play("D",0.475,2)
	W(waitm.Value)

	Play("B",1.2,2)
	W(waitm.Value)
end
function Four()
	Play("A",0.575,1.6)
	Play("B",1.325,2)
	Play("D",0.33625,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("A",0.575,0.8)
	Play("B",1.325,2)
	Play("D",0.33625,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("B",1.325,2)
	Play("D",0.33625,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("B",1.325,2)
	Play("D",0.33625,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("A",0.575,1.6)
	Play("B",1.325,2)
	Play("C",1.5,1.5)
	Play("D",0.33625,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("A",0.575,0.8)
	Play("B",1.325,2)
	Play("D",0.33625,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("B",1.325,2)
	Play("D",0.33625,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("B",1.325,2)
	Play("D",0.33625,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("A",0.575,1.6)
	Play("B",1.325,2)
	Play("D",0.33625,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("A",0.575,0.8)
	Play("B",1.325,2)
	Play("D",0.33625,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("B",1.325,2)
	Play("D",0.33625,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("B",1.325,2)
	Play("D",0.33625,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("A",0.575,1.6)
	Play("B",1.325,2)
	Play("C",1.5,1.5)
	Play("D",0.33625,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("A",0.575,0.8)
	Play("B",1.325,2)
	Play("D",0.33625,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("B",1.325,2)
	Play("D",0.33625,2)
	W(waitm.Value)

	Play("B",1.325,2)
	W(waitm.Value)

	Play("D",0.33625,2)
	W(waitm.Value)

	W(waitm.Value)
end
local Current = track.Value
wait(3)
while true do
	Current = track.Value
	track.Value = track.Value + 1
	skip.Value = false
	if track.Value > 4 then
		track.Value = 1
	end
	if Current == 1 then
		One()
	elseif Current == 2 then
		Two()
	elseif Current == 3 then
		Three()
	elseif Current == 4 then
		Four()
	else
		track.Value = 1
	end
end